7 9- 14- -I 


Dear Robert Fabris, 


20 Oct 79 



I've been away the last few months and can see that I have to 
respond to some info you have had in the mailings. 

Please put me in as a reviewer of games. I have the time now 
and am able to go over and perhaps improve upon some games. (I 
will send you my revised slot machine program next month.) 

My address and telephone number is: 

Anson P. Winsor 
466 Selfridge Dr. 

Colo Spgs, Co 80916 
phone (303) 596-4921 

I havfc—^een the Hackers manual mentioned a few times. I would 
ike to find out how much a copy of it would cost. 

That volume of about 140 pages of Routines. I am very interested 
in getting a copy. Please put me down as one of those showing 
interest. By the way, where did you get it, how much for a copy. 

Also, even though I hadn't responded before, I am interested in 
expanding my computer. Please send info about the work being done 
and how can I do it. 



I have inclosed two short and one long program. The long one, 
CONCENTRATION, has a page documenting it. The cassetee with the 

coded programs is mailed at the same time. _____—-- 

Also inclosed is a page of notes on the Loop and Subroutines as 
the pop/push stack saves them. 




I have just achieved results in becoming a dealer in the BALLY 
product, (enclosed is two sheets on the price list and the two 
new cassettes coming out.) 

Please place an ad in the next months ARCADIAN: 

Free shipping on any order and 10% off any orders over $50. 
Complete line of BALLY products. Also Arcadian software for 
sale or trade. Winsor Computers, 466 ^elfridge Dr., Colo Bpgs, 
Co. 80916. (303) 596-4921. 

I am working on ways to run machine code programs. When I have 
more definate information about it I will send how. Right now I 
have been able to get some machine code loaded and am able to run 
and rerun it again and again without having to reload it into memory. 

l have noticed that text won't let you call to it. i believe 
this is because the bally basic has some check code to stop anyone 
from accessing bytes that also coorspond to the bits representing 
the TV screen. Just a guess so far. 


The hex dump I've included enables one to check out many areas of 
code. I can see how you could get the code of the bally basic cassette 
if it would help out. 


Is there any info you can send me in the area of runing machine 
code besides that volume you were telling us about.' 

What further work is being done on expansinnY 
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NOTES ON THE SUBROUTINE & FOR LOOP PUSH-DOWN/POP-UP STACK. 

Subroutine levels and loop parameters are placed into the stack 
in a First-In-Last-Out (FILO) basis. Only those FOR Loops orginated 
at a particular subroutine level are available in that now level. 
Example that doesn't work: 

10 For A=1TO 5 Initialize Loop parameters. 

20 GOSUB 100 Loop parameters get put into stack 

. any code 

100 NEXT A Requesting a test of the Loop that 

was orginated in a different sub level. 
The computer doesn‘t have this info 
in the current now level, but it is in 
the stack. 

The computer cannot find any reference to the loop you are trying to 
test and breaks out of your program with a "WHAT?”. 

When a previous level of subroutine is popped up, current Loop 
parameters are lost and the previously stored loop parameters are 
available again. 

There are 20 levels available of subroutines. The 'now' level 
currently available to the computer and 19 levels in the stack. 

Try this short program to see: 

10 X=0 At the main now level with no subroutines. 

20 GOSUB 30 Pushing the current now level into the stack. 

30 X=X+1;PRINT X Showing the subroutines in the stack. 

40 GOTO 20 Back to 20 to try another subroutine level. 

The computer only lets you push 19 levels of subs into the stack. 

When the 20th level is tried to be pushed, the computer responds 
again with a "WHAT?". 

When only Loops, or Loops & subroutine levels, are involved there 
are fewer spaces available in the stack. Example of only Loops: 

10 X="A" X=numeric value of "A" 

20 FOR A=1T0 5;PRINT "A" Start the 'A' Loop and Print the letter 

'A'. (Later will print B,C,D,E,etc .) 

30 X=X+1 Increment X to the numeric value of 'B' 

(later to C,D,E,etc.) 

40 %(-24566)=X*256+"FOR" Poke in 'FOR A' into text line 20. 

50 %(-24558)=X*256+34 Poke in "'A' into text of line 20. 

60 GOTO 20 Go back to 20 to start next loop and 

print out what loop was started. 

Notice it only lets you have 16 Loop parameters (up to 'P'). 

When Loops and subroutine levels are mixed, the total allowed is 
usually about 17. 

Code is not needed to terminate a loop if the loop parameters are 
never tested against before the loop is reinitialized again. 

10 FOR A=1T0 10;FOR B=1T0 § Better to change line 20 to read 
20 IF @(A)=0A=1O;B=5 20 IF @(A)=0 GOTO 100 

30 NEXT B;NEXT A;G0T0 100 When the Loops are started again 

100 do something;G0T0 10 the previous parameters are lost 

and so it doesn't matter you didn't 
finish it before. 



NOTES ON THE CONCENTRATION GAME 
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Lines 10-15 presets scores=0 and initial player locations. 

Line 20 lets you select a letters or numbers game. 

Line 30 sets up to play numbers 0-9, one each. 

Line 40 selects 10 letters at random, may be duplicates. 

Line 50 puts the letters/numbers (L/n) in random @ locations. 

Then duplicated the string for the other player. 

Line 60 draws each players game board. 

nine 80 inits a games variables and prints score. 

Line 85 places the player on board, first game in UL corner. 

Line 90 negins the game loop. Checks if you are trying to reveal 
a L/N or make a match attempt. If you are, it goes sub to reveal 
and check if a match was made. Upon return a check is made if 
you finished all matched on your board and are ready for another 
game. If a new game, goes to line 30 to restart. 

Line 100 gets new joystick values. If a change, it goes sub to 
move your marker. 

Line 110 ends the game loop and loops back to line 90 again, 
jjine 120-170 is the move subroutine. Movement is made to stay on 
the board and return is made to game loop. 

Line 180 begins the n/N reveal and match check subroutine. 

Lipes 180-190 retrieves the X-Y values and figures CX-CY values, 
ana the index into ® is calculated. 

Line 195 if that location has been previously matched, if so, return. 
Line 196 if still at the location of a revealed ii/N, return. 

Line 200 reveals the L/N. If it is the first half of a match attempt, 
the @, L/N, and X-Y values are saved and return made. 

Line 210 is checking if second half of a valid match is made. If 
not, the l/N on board are cleared and return is made. 

Line 215 a match is made. Pointers are cleared and scoring made. 

Line 220 If all of board is not matched, * is stored in matched 
L/N boxes and return is made. 

Line 230 a game is finished. Winner gets bonus score and musical 
tones played. Request if want play more. 

Lines 240-250 is a loop to determine if another game is to be played. 
TR(1)=1 is a letter game and TR(2) is a numbers game. Return is 
made to the game loop then back to line 30 to start new game. 

Lines 260-270 is the scoring subroutine. 

Notes on play: a match is made up of any number of games wanted 
with all scoring totaling up. A L/N match gets 5 points and a 
full board matched gets 25 bonus points for the player. 

The attached listing has been doubled checked and should be exactly 
as the working one on my machine. Hopefully no bugs left in it. 


Sincerely yours, 


cJ) 
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